home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Games / Connect4 / source / window / newgamewin.c < prev    next >
Encoding:
Text File  |  2001-05-13  |  3.7 KB  |  87 lines
  1. SubWindow, newgamewin = WindowObject,
  2.     MUIA_Window_Title,  "New Game",
  3.     MUIA_Window_ID,     MAKE_ID('N','E','W','G'),
  4.     MUIA_Window_Width,  MUIV_Window_Width_Default,
  5.     MUIA_Window_Height, MUIV_Window_Height_Default,
  6.     MUIA_Window_ScreenTitle, "Connect 4",
  7.     MUIA_Window_CloseGadget, FALSE,
  8.  
  9.     WindowContents, VGroup,
  10.         Child, HGroup,
  11.             Child, LampObject,
  12.                 MUIA_Lamp_Type, MUIV_Lamp_Type_Huge,    
  13.                 MUIA_Lamp_Red,   0xffffffff,
  14.                 MUIA_Lamp_Green, 0,                     // Red
  15.                 MUIA_Lamp_Blue,  0,
  16.             End,
  17.             Child, name1 = StringObject,
  18.                 MUIA_String_Contents, default_player_name[0],
  19.                 MUIA_Frame, MUIV_Frame_String,
  20.                 MUIA_String_MaxLen, NAME_LEN,
  21.                 MUIA_CycleChain, 1,
  22.                 MUIA_String_AdvanceOnCR, TRUE,
  23.             End,
  24.             Child, pop1 = PopobjectObject,
  25.                 MUIA_Popstring_Button, PopButton(MUII_PopUp),
  26.                 MUIA_Popobject_Object, poplistview1=ListviewObject,
  27.                     MUIA_FixWidth, 300,
  28.                     MUIA_Frame, MUIV_Frame_InputList,
  29.                     MUIA_Listview_List, poplist1=ListObject,
  30.                         MUIA_List_Format, "BAR,BAR,WEIGHT=200",
  31.                         MUIA_List_Title, TRUE, // Enable multicolumn title support
  32.                         MUIA_Listview_ScrollerPos, MUIV_Listview_ScrollerPos_Right,
  33.                         MUIA_List_DisplayHook,     &PAB_display_hook,
  34.                         MUIA_List_ConstructHook,   &PAB_constructor_hook,
  35.                         MUIA_List_DestructHook,    &PAB_destructor_hook,
  36.                         MUIA_List_CompareHook,     &PAB_compare_hook,
  37.                     End,
  38.                 End,
  39.             End,
  40.         End,
  41.         Child, HGroup,
  42.             Child, LampObject,
  43.                 MUIA_Lamp_Type, MUIV_Lamp_Type_Huge,
  44.                 MUIA_Lamp_Red,   0xffffffff,
  45.                 MUIA_Lamp_Green, 0xffffffff,         // Yellow
  46.                 MUIA_Lamp_Blue,  0,
  47.             End,
  48.             Child, name2 = StringObject,
  49.                 MUIA_String_Contents, default_player_name[1],
  50.                 MUIA_Frame, MUIV_Frame_String,
  51.                 MUIA_String_MaxLen, NAME_LEN,
  52.                 MUIA_CycleChain, 1,
  53.                 MUIA_String_AdvanceOnCR, TRUE,
  54.             End,
  55.             Child, pop2 = PopobjectObject,
  56.                 MUIA_Popstring_Button, PopButton(MUII_PopUp),
  57.                 MUIA_Popobject_Object, poplistview2=ListviewObject,
  58.                     MUIA_FixWidth, 300,
  59.                     MUIA_Frame, MUIV_Frame_InputList,
  60.                     MUIA_Listview_List, poplist2=ListObject,
  61.                         MUIA_List_Format, "BAR,BAR,WEIGHT=200",
  62.                         MUIA_List_Title, TRUE, // Enable multicolumn title support
  63.                         MUIA_Listview_ScrollerPos, MUIV_Listview_ScrollerPos_Right,
  64.                         MUIA_List_DisplayHook,     &PAB_display_hook,
  65.                         MUIA_List_ConstructHook,   &PAB_constructor_hook,
  66.                         MUIA_List_DestructHook,    &PAB_destructor_hook,
  67.                         MUIA_List_CompareHook,     &PAB_compare_hook,
  68.                     End,
  69.                 End,
  70.             End,
  71.         End,
  72.         Child, HGroup,
  73.             Child, RectangleObject, End,
  74.             Child, startbutton = TextObject,
  75.                       MUIA_Text_Contents, "Start",
  76.                       MUIA_Text_SetMax, TRUE,
  77.                       MUIA_Frame, MUIV_Frame_Button,
  78.                       MUIA_InputMode, MUIV_InputMode_RelVerify,
  79.                       MUIA_Background, MUII_ButtonBack,
  80.                       MUIA_CycleChain, 1,
  81.             End,
  82.             Child, RectangleObject, End,
  83.         End,
  84.     End,
  85. End,
  86.  
  87.